GetInclude OLE Automation Routine

GetInclude( itemNumber )

  • itemNumber the position of the item in the list to be retrieved, where 1 is the first item in the list.

    Returns a string containing the file specification or an empty string if itemNumber is larger than the number of items in the list.

    •

    Example:

    List1.Clear
Dim nCount As Integer
Dim sPath As String
    nCount = 1
    While nCount
    sPath = wilbur.GetInclude(nCount)
nCount = nCount + 1
If sPath <> "" Then
    List1.AddItem (sPath)
    Else
    nCount = 0
    End If
    Wend

    This example will fill a list box with all of the entries in the include list.

    Copyright ⌐ 1999 RedTree Development Inc. All rights reserved.
    Information in this document is subject to change without notice.
    Other products and companies referred to herein are trademarks or registered trademarks of their respective companies or mark holders.